object ttDialog: TttDialog Left = 244 Top = 129 ActiveControl = OKBtn BorderStyle = bsDialog Caption = 'tintin++ Conversion' ClientHeight = 300 ClientWidth = 388 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 8 Top = 10 Width = 46 Height = 13 Alignment = taRightJustify Caption = 'Importing:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 8 Top = 34 Width = 228 Height = 13 Caption = 'Exceptions and warnings will be displayed below' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 8 Top = 48 Width = 188 Height = 13 Caption = 'and the offending lines will be written to:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label4: TLabel Left = 216 Top = 10 Width = 23 Height = 13 Caption = 'Line:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object OKBtn: TBitBtn Left = 300 Top = 8 Width = 77 Height = 27 Caption = 'OK' Default = True Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 1 ParentFont = False TabOrder = 0 OnClick = OKBtnClick Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object Filename: TEdit Left = 64 Top = 8 Width = 145 Height = 21 TabStop = False Color = clBtnFace Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 1 end object ErrorFile: TEdit Left = 8 Top = 62 Width = 177 Height = 20 TabStop = False BorderStyle = bsNone Color = clBtnFace Ctl3D = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 2 Text = 'ErrorFile' end object ErrorMemo: TMemo Left = 8 Top = 88 Width = 369 Height = 201 TabStop = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'ErrorMemo') ParentFont = False ReadOnly = True ScrollBars = ssBoth TabOrder = 3 end object Line: TEdit Left = 248 Top = 8 Width = 41 Height = 21 TabStop = False Color = clBtnFace Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 4 end end